Voorbeeld van de methode Item

Dit voorbeeld maakt gebruik van de methode Item om een verwijzing naar een object in een collectie op te halen. Ervan uitgaande dat Verjaardagen een Collection-object is, haalt de volgende programmacode uit de collectie verwijzingen op naar de objecten die de verjaardagen van Jan Jansen en Piet Jansen vertegenwoordigen, met behulp van de sleutels 'JansenJan' en 'JansenPiet' als index-argumenten. De eerste oproep specificeert expliciet de methode Item, de tweede echter niet. De beide oproepen werken omdat de methode Item de standaard is voor een Collection-object. De verwijzingen, toegewezen aan JansenJanBD en JansenPietBD met behulp van Set, kunnen worden gebruikt om toegang te krijgen tot de eigenschappen en methoden van de opgegeven objecten. Om deze programmacode uit te voeren, maakt u de collectie en neemt u daarin minimaal de twee leden op waarnaar wordt verwezen.

Dim JansenJanBD As Object
Dim JansenPietBD As Object
Dim Verjaardagen
Set JansenJanBD = Verjaardagen.Item("JansenJan")
Set JansenPietBD = Verjaardagen("JansenPiet")